home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 April / macformat-023.iso / Reader's Corner / Reader's Contibutions / Modified / FrEQuency data / 00061_mini1.ls < prev    next >
Encoding:
Text File  |  1995-01-19  |  1.3 KB  |  47 lines
  1. on mouseUp
  2.   global startMovie, leap, hidden, flip
  3.   if the frame < 1900 then
  4.     set leap to 0
  5.     set hidden to 0
  6.     set flip to flip + 1
  7.     if flip > 4 then
  8.       unLoadCast(97, 120)
  9.       set the movieRate of sprite 25 to 0
  10.       set the movieRate of sprite 23 to 0
  11.       set the movieRate of sprite 33 to 0
  12.       set the movieTime of sprite 34 to 0
  13.       set the movieRate of sprite 34 to 1
  14.       go("new sample")
  15.     else
  16.       unLoadCast(97, 120)
  17.       set the movieRate of sprite 25 to 0
  18.       set the movieRate of sprite 33 to 0
  19.       set the movieRate of sprite 23 to 0
  20.       set the movieTime of sprite 34 to 0
  21.       set the movieRate of sprite 34 to 1
  22.       go("gordo1")
  23.     end if
  24.   else
  25.     set leap to 0
  26.     set hidden to 0
  27.     set flip to flip + 1
  28.     if flip > 4 then
  29.       unLoadCast(97, 120)
  30.       set the movieRate of sprite 25 to 0
  31.       set the movieRate of sprite 23 to 0
  32.       set the movieRate of sprite 33 to 0
  33.       set the movieTime of sprite 34 to 0
  34.       set the movieRate of sprite 34 to 1
  35.       go("new samplea")
  36.     else
  37.       unLoadCast(97, 120)
  38.       set the movieRate of sprite 25 to 0
  39.       set the movieRate of sprite 33 to 0
  40.       set the movieRate of sprite 23 to 0
  41.       set the movieTime of sprite 34 to 0
  42.       set the movieRate of sprite 34 to 1
  43.       go("gordo1a")
  44.     end if
  45.   end if
  46. end
  47.